function prof = TUSIM_prof(b,X)

prof = mean((X*b).*(X*b > 0));